home *** CD-ROM | disk | FTP | other *** search
/ Interplay's Learn to Program Basic (Review Copy) / Learn to Program Basic Review Copy (Interplay)(June 23, 1998).ISO / pc / ltpbasic / refxmpl / showspr.bas < prev    next >
BASIC Source File  |  1998-04-07  |  189b  |  13 lines
  1. Rem Load and display a sprite
  2. sp = LoadSprite("UFO")
  3. SetSprite sp To 100,100
  4. Sleep 10
  5. Rem Hide the sprite for a while
  6. HideSprite sp
  7. Sleep 10
  8. Rem Now show it again
  9. ShowSprite sp
  10. Sleep 10
  11.  
  12.